home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / net / amitcp2_x_gcc.lha / RCS.RCSfiles / sana2perror.c,v < prev    next >
Text File  |  1994-01-12  |  2KB  |  123 lines
  1. head    1.3;
  2. access;
  3. symbols;
  4. locks
  5.     jasegler:1.3; strict;
  6. comment    @ * @;
  7.  
  8.  
  9. 1.3
  10. date    94.01.12.18.38.06;    author jasegler;    state Exp;
  11. branches;
  12. next    1.2;
  13.  
  14. 1.2
  15. date    94.01.11.20.06.22;    author jasegler;    state Exp;
  16. branches;
  17. next    1.1;
  18.  
  19. 1.1
  20. date    94.01.11.19.34.21;    author jasegler;    state Exp;
  21. branches;
  22. next    ;
  23.  
  24.  
  25. desc
  26. @@
  27.  
  28.  
  29. 1.3
  30. log
  31. @*** empty log message ***
  32. @
  33. text
  34. @char RCS_ID_SANA2PERROR_C[] = "$Id: sana2perror.c,v 1.2 1994/01/11 20:06:22 jasegler Exp jasegler $";
  35. /*
  36.  * sana2perror.c --- print SANA-II error message
  37.  *
  38.  * Author: ppessi <Pekka.Pessi@@hut.fi>
  39.  *
  40.  * Copyright © 1993 AmiTCP/IP Group, <amitcp-group@@hut.fi>
  41.  *                  Helsinki University of Technology, Finland.
  42.  *                  All rights reserved.
  43.  *
  44.  * Created      : Sat Mar 20 02:10:14 1993 ppessi
  45.  * Last modified: Sun Jun 13 03:17:42 1993 ppessi
  46.  */
  47.  
  48. #ifdef KERNEL
  49. /*
  50.  * Note: This file is to be recompiled with AmiTCP/IP proper
  51.  *       with preprocessor symbol KERNEL defined.
  52.  *       You should NOT link it directly from "net.lib"!
  53.  */
  54. #include <conf.h>
  55. #include <sys/param.h>
  56. #include <sys/systm.h>
  57. #include <sys/syslog.h>
  58. #define fprintf log
  59. #define stderr LOG_ERR
  60. #else
  61. #include <stdio.h>
  62. #endif
  63.  
  64. #include <devices/sana2.h>
  65. #include <net/sana2errno.h>
  66.  
  67. void
  68. sana2perror (const char *banner, struct IOSana2Req *ios2)
  69. {
  70.   register WORD err = ios2->ios2_Req.io_Error;
  71.   register ULONG werr = ios2->ios2_WireError;
  72.   const char *errstr;
  73.  
  74.   if (err >= sana2io_nerr || -err > io_nerr)
  75.     {
  76.       errstr = io_errlist[0];
  77.     }
  78.   else
  79.     {
  80.       if (err < 0)
  81.     /* Negative error codes are common with all IO devices */
  82.     errstr = io_errlist[-err];
  83.       else
  84.     /* Positive error codes are SANA-II specific */
  85.     errstr = sana2io_errlist[err];
  86.     }
  87.  
  88.   if (werr == 0 || werr >= sana2wire_nerr)
  89.     {
  90.       fprintf (stderr, "%s: %s\n", banner, errstr);
  91.     }
  92.   else
  93.     {
  94.       fprintf (stderr, "%s: %s (%s)\n", banner, errstr, sana2wire_errlist[werr]);
  95.     }
  96. }
  97. @
  98.  
  99.  
  100. 1.2
  101. log
  102. @*** empty log message ***
  103. @
  104. text
  105. @d1 1
  106. a1 1
  107. char RCS_ID_C[] = "$Id: sana2perror.c,v 1.1 1994/01/11 19:34:21 jasegler Exp jasegler $";
  108. @
  109.  
  110.  
  111. 1.1
  112. log
  113. @Initial revision
  114. @
  115. text
  116. @d1 1
  117. a1 1
  118. RCS_ID_C = "$Id: sana2perror.c,v 1.4 1993/06/13 00:18:09 ppessi Exp $";
  119. d19 1
  120. a19 1
  121.  *       You should NOT link it directly from "net.lib"! 
  122. @
  123.